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Those of you who are also supporters of the Australian 
CoCo-Link magazine would no doubt be aware that CoCo-Link 
will cease production with the Deceiber 1992 edition. 
Ve are of course saddened to hear this news and would 
like to offer our congratulation to Robbie Dalzell, Garry 
Holder, Sub-Editors and the other helpers for the great 
job they have done over the past few years. Their 
genuine efforts to help CoCo users and to keep the CoCo 
community alive is to be commended, well done. 

Ve have covered many tiies our disappointment with the 
Tandy decision to quit the CoCo and I don't want to go 
into that again. It is however quite an achieveient that 
CoCo Usergroups and magazines have been able to continue 
for a couple of years after Tandy dropped the product AID 
their support. 

The Australian 0S9 Usergroup continues on with the 
promise of bigger and better things in the future, 0S9 
level 2 on the CoCo3 & 6909 is still hard to beat in lany 
ways. The huible CoCo is certainly not able to latch the 
speed, video displays and many other beaut things on 
offer in the 68m 0S9 lachines but the CoCo3 with 
Kicroware's 0S9 L2 has set the others a real challenge in 
such things as the L2 windowing system. 

Ve believe that the new 0S9 68K platfons such as the 
MM/1, Deliar and Frank Hogg's lachines will ensure a 
growing following of 0S9 and maybe even OS9000 on those 
386 and 486 P.C's. 

0S9 Usergroups in one fori or another are on the 
increase. Inforiation about the OCH Community on Fido has 
been featured in previous editorials, as well a3 this we 



are seeing talk of the old U.S. 0S9 Usergroup being 
reforied with lany of those notable nates involved. 

Of course it lay be that we will also have to fold up one 
day, but that will be a decision that you, the members, 
will lake. Until then we plan to bring news and articles 
of interest to help all leibers enjoy 0S9. 



IS THIS EDITIOS 

Our tutorial in the 'C programming language continues 
with Chapter 8. The Rainbow 0S9 article index continues 
with the 1990 listing. 

Bob Devries has generously supplied yet another 'C 
prograne, complete with source code. This programme 
will convert an Aiiga Sound Sample file so that it lay be 
used with the 0S9 'Play 1 . 

A disk reader/verifier programmer in r C\ also by Bob 
Devries is included. 

Ve have all seen the ■More 1 utility in use under MS-DOG 
or the 'C version on a CoCo. Veil in this edition we 



have the source for 
for you to type in. 



an asseibler version by Boisy Pitre 



Ve do hope that you find soiething useful in this edition 
and remind you that our P.D. library continues to grow 
slowly with all sorts of interesting and useful utilities 
and programmes from oveseas and local authors. All these 
and our UGCAT (Catalogue of Usergroup P.D. software) are 
available for our usual nominal copy fee. 

Cheers, Gordon. 



ooooooooooOOOOOOOOOOoooooooooo 

A C Tutorial 
Chapter 8 - Pointers 



WHAT IS A POIHTER? 

Simply stated, a pointer is an address. Instead of 
being a variable, it is a pointer to a variable stored 
somewhere in the address space of the program. It is 
always best to use an example so load the file named 
POIHTER. C and display it on your monitor for an example 
of a program with some pointers in it. For the moment, 
ignore the data declaration statement where we define 
■index 1 and two other fields beginning with a star. It 



is properly called an asterisk, but for reasons we will 
see later, let's agree to call it a star. If you observe 
the first statement, it should be clear that we assign 
the value of 39 to the variable 'index 1 . This is no 
surprise, we have been doing it for several programs now. 
The next statement however, says to assign to 'ptl' a 
strange looking value, namely the variable 'index 1 with 
an ampersand in front of it. In this example, ptl and 
pt2 are pointers, and the variable 'index' is a simple 
variable. 
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Now we have a problei. Ve aeed to learn how to use 
pointers in a prograi, but to do 30 requires that first 
we define the leans of using the pointers in the prograi. 
The following two rules will be 30iewhat confusing to 700 
at first but we need to state .the definitions before we 
can use then. Take your tiie, and the whole thing will 
clear up very quickly. 

TVO VERY IMPORTANT RULES 

The following two rules are very important when using 
pointers and lust be thoroughly understood. 

1. A variable naie with an aipersand in front of it 
defines the addres3 of the variable and therefore 
points to the variable. You can therefore read line 
six as 'ptl is assigned the value of the address of 
index 1 . 

2. A pointer with a 'star' in front of it refers to the 
value of the variable pointed to by the pointer. 
Line nine of the prograi can be read as 'The stored 
(starred! value to which the pointer 'ptl 1 points is 
assigned the value 13'. Now you can see why it is 
convenient to think of the asterisk as a star, it 
sort of sounds like the word store. 

MEMORY AIDS 



3even, it doesn't point to anything, it contains garbage. 
Of course, that is also true of any variable until a 
value is assigned to it. Stateient 3even assigns 'pt2' 
the saie address as "ptl 1 , so that now 'pt2' also paints 
to the variable 'index'. So to continue the definition 
froi the last paragraph, anyplace in the prograi where it 
ia perni3sible to use the variable 'index', it is also 
periissible to U3e the naie '*pt2' because they are 
identical in leaning. This fact is illustrated in the 
first 'printf* stateient since this stateient use3 the 
three leans of identifying the 3aie variable to print out 
the same variable three tiies. 

THERE IS ONLY ONE VARIABLE 

Note carefully that, even though it appears that 
there are three variables, there is really only one 
variable. The two pointers point to the single variable. 
This is illustrated in the next stateient which assigns 
the value of 13 to the variable 'index', because that ia- 
where the pointer ■ptl 1 is pointing. The next 'printf 
stateient causes the new value of 13 to be printed out 
three tines. Keep in lind that there is really only one 
variable to be changed, not three. This is admittedly a 
very difficult concept, but since it is used extensively 
in all but the lost trivial C programs, it is well worth 
your tiie to stay with this material until you understand 
it thoroughly. 



1. Think of k as an address. 

2. Think of * as a star referring to stored. 

Assuie for the loient that 'ptl' and 'pt2' are 
pointers (we will see how to define thei shortly). As 
pointers, they do not contain a variable value but an 
address of a variable and can be used to point to a 
variable. Line six of the prograi assigns the pointer 
'ptl' to point to the variable we have already defined as 
'index' because we have assigned the address of 'index' 
to *ptl'. Since we have a pointer to 'index', we can 
lanipulate the value of 'index' by using either the 
variable naie itself, or the pointer. Line nine modifies 
the value by using the pointer. Since the pointer 'ptl' 
points to the variable 'index', then putting a star in 
front of the pointer naie refers to the leiory location 
to which it ia pointing. Line nine therefore assigns to 
'index' the value of 13. Anyplace in the prograi where 
it is permissible to use the variable naie 'index', it is 
also periissible to use the naie ,4 ptl' since they are 
identical in leaning until the pointer is reassigned to 
soie other variable. 



HOW DO YOU DECLARE A POINTER? 

Now to keep a promise and tell you how to declare a 
pointer. Refer to the third line of the prograi and you 
will see our old familiar way of defining the variable 
'index', followed by two lore definitions. The second 
definition can be read as 'the storage location to which 
'ptl' points will be an int type variable'. Therefore, 
■ptl' is a pointer to an int type variable. Likewise, 
'pt2' is another pointer to an int type variable. A 
pointer lust be defined to point to some type of 
variable. Following a proper definition, it cannot be 
used to point to any other type of variable or it will 
result in a 'type incompatibility' error. In the same 
manner that a 'float' type of variable cannot be added to 
an 'int* type variable, a pointer to a 'float' variable 
cannot be used to point to an integer variable. Compile 
and run this program and observe that there ia only one 
variable and the single statement in line 9 changes the 
one variable which is displayed three times. 

THE SECOND PROGRAM VITH POINTERS 



ANOTHER POINTER 

Just to add a little intrigue to the system, we have 
another pointer defined in this program, 'pt2'. Since 
'pt2' has not been assigned a value prior to statement 



In these few pages so far on pointers, we have 
covered a lot of territory, but it is important 
territory. Ve still have a lot of material to cover so 
stay in tune as we continue this important aspect of C. 
Load the next file named P0INTER2.C and display it on 
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your monitor so we can continue our study. In this 
prograi we have defined several variables and two 
pointers. The first pointer naied 'there 1 is a pointer 
to a ■char* type variable and the second naied f pt' 
points to an 'int' type variable. Hotice also that we 
have defined two array variables naned 'strg' and 'list'. 
Ve fill use them to show the correspondence between 
pointers and array naies. 

A STRUG VARIABLE IS ACTUALLY A POIHTER 

In the programing language C, a string variable is 
defined to be simply a pointer to the beginning of a 
string. This will take Bone explaining. Refer to the 
example progran on your lonitor. Tou will notice that 
first we assign a string constant to the string variable 
named 'strg 1 so we will have sone data to work with. 
Bext, we assign the value of the first element to the 
variable •one 1 , a simple 'char' variable. Bext, since 
the string name is a pointer by definition of the C 
language, we can assign the sane value to 'two 1 by using 
the star and the string naie. The result of the two 
as3ignnents are such that 'one' now has the saie value as 
'two', and both contain the character 'T', the first 
character in the string. 

Hote that it would be incorrect to write the ninth 
line as 'two = *strg[0];' because the star takes the 
place of the square brackets. For all practical 
purposes, 'strg' is a pointer. It does, however, have 
one restriction that a true pointer does not have. It 
cannot be changed like a variable, bat must always 
contain the initial value and therefore always points to 
its string. It could be thought of as a pointer 
constant, and in some applications you Bay desire a 
pointer that cannot be corrupted in any way. Even though 
it cannot be changed, it can be used to refer to other 
values than the one it is defined to point to, as we will 
see in the next section of the progran. Moving ahead to 
line 12, the variable 'one' is assigned the value of the 
ninth variable (since the indexing starts at zero) and 
'two' is assigned the sane value because we are allowed 
to index a pointer to get to values farther ahead in the 
string. Both variables now contain the character 'a'. 

The C programing language takes care of indexing for 
us automatically by adjusting the indexing for the type 
of variable the pointer is pointing to. In this case, 
the index of 8 is siiply added to the pointer value 
before looking up the desired result because a 'char' 
type variable is one byte long. If we were using a 
pointer to an 'int' type variable, the index would be 
doubled and added to the pointer before looking up the 
value because an 'int' type variable uses two bytes per 
value stored. Vhen we get to the chapter on structures, 
we will see that a variable can have many, even into the 
hundreds or thousands, of characters per variable, but 



the indexing will be handled automatically for us by the 
syBtei. Since 'there 1 is already a pointer, it can be 
assigned the value of the eleventh eleient of 'strg' by 
the statenent in line 16 of the prograi. Reieiber that 
since 'there' is a true pointer, it can be assigned any 
value as long as that value represents a 'char' type of 
address. It should be clear that the pointers lust be 
•typed' in order to allow the pointer arithietic 
described in the last paragraph to be done properly. The 
third and fourth outputs will be the same, namely the 



POIHTER ARITHMETIC 

Hot all fons of arithietic are permissible on a 
pointer. Only those things that lake sense, considering 
that a pointer is an address soiewhere in the coiputer. 
It would lake sense to add a constant to an address, 
thereby loving it ahead in leiory that nuiber of places. 
Likewise, subtraction is permissible, loving it back some 
nuiber of locations. Adding two pointers together would 
not lake sense because absolute leiory addresses are not 
additive. Pointer lultiplication is also not allowed, as 
that would be a funny nuiber. If you think about what 
you are actually doing, it will lake sense to you what is 
allowed, and what is not. 

NOV FOR AH IHTEGER POIHTER 

The array naied 'list' is assigned a series of values 
froi 100 to 199 in order to have soie data to work with. 
Hext we assign the pointer 'pt' the value of the 28th 
eleient of the list and print out the saie value both 
ways to illustrate that the system truly will adjust the 
index for the 'int' type variable. You should spend soie 
tiie in this prograi until you feel you fairly well 
understand these lessons on pointers. Compile and run 
P0IHTER2.C and study the output. You may recall that 
back in the lesson on functions we mentioned that there 
were two ways to get variable data back from a function. 
One way is through use of the array, and you should be 
right on the verge of guessing the other way. If your 
guess is through use of a pointer, you are correct. Load 
and display the program named TVOVAY.C for an example of 
this. 

FUHCTIOH DATA RETURH WITH A POIHTER 

In TVOVAY.C, there are two variables defined in the 
main program 'pecans' and 'apples'. Hotice that neither 
of these is defined as a pointer. Ve assign values to 
both of these and print them out, then call the function 
'fixup' taking with us both of these values. The 
variable 'pecans' is simply sent to the function, but the 
address of the variable 'apples' is sent to the function. 
How we have a problem. The two arguments are not the 
same, the second is a pointer to a variable. Ve must 
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Boiehow alert the function to the fact that it is 
supposed to receive an integer variable and a pointer to 
an integer variable. This tarns out to be very simple. 
Sotice that the paraieter definitions in the function 
define 'nuts 1 as an integer, and 'fruit 1 as a pointer to 
an integer. The call in the lain prograi therefore is 
now in agreeient with the function heading and the 
prograi interface will work just fine. In the body of 
the function, we print the two values sent to the 
function, then lodify thei and print the new values out. 
This should be perfectly clear to you by now. 

The surprise occurs when we return to the lain 
prograi and print out the two values again. Ve will find 
that the value of pecans will be restored to its value 
before the function call because the C language makes a 
copy of the itei in question and takes the copy to the 
called function, leaving the original intact. In the 
case of the variable 'apples 1 , we lade a copy of a 
pointer to the variable and took the copy of the pointer 
to the function. Since we had a pointer to the original 
variable, even though the pointer was a copy, we had 
access to the original variable and could change it in 
the function. Vhen we returned to the lain prograi, we 
found a changed value in 'apples 1 when we printed it out, 
By using a pointer in a function call, we can have access 
to the data in the function and change it in such a way 
that when we return to the calling prograi, we have a 
changed value of data. It lust be pointed out however, 
that if you lodify the value of the pointer itself in the 
function, you will have a restored pointer when you 
return because the pointer you use in the function is a 
copy of the original. In this example, there was no 
pointer in the lain prograi because we simply sent the 



address to the function, but in lany prograis you will 
use pointers in function calls. One of the places you 
will find need for pointers in function calls will be 
when you request data input using standard input/output 
These will be covered in the next two 
Compile and run TMAY.C and observe the 



routines, 
chapters, 
output. 



POIiTERS ARE VALUABLE 

Even though you are probably soiewhat intiiidated at 
this point by the use of pointers, you will find that 
after you gain experience, you will use them profusely in 
many ways. You will also use pointers in every program 
you write other than the most trivial because they are so 
useful. You should probably go over this material 
carefully several times until you feel comfortable with 
it because it is very important in the area of 
input/output which is next on the agenda. 

PR0GRAMMI8G EXERCISES 

1. Define a character array and use "strcpy 1 to copy a 
string into it, Print the string out by using a loop 
with a pointer to print out one character at a time. 
Initialize the pointer to the first element and use 
the double plus sign to increment the pointer. Use a 
separate integer variable to count the characters to 
print. 

2. Modify the program to print out the string backwards 
by pointing to the end and using a decrementing 
pointer. 
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CoCo-Link is an excellent magazine to help you with the RSDOS side of the Colour Computer. It is a bi-monthly magazine 
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South Australia 
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An Index of Rainbow 0S9 Articles 

compiled by Bob Devries 

January - December '90 



January 1990 page 110 

One Label or Two - A simple label-maker program. 

Kevin Deneen 



January 1990 page 56 



Breakpoint - Don't spend all 

disk. 

Greg Law 

January 1990 page 117 



day looking for a certain 
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KlSSable 0S9 - Talking about modularity. 
Dale L. Puckett 

February 1990 page 56 

Drive With Speed - Verify lakes your 0S9 floppy drives 

work inch faster. 

Stephen B. Goldberg 

February 1990 page 122 

Breakpoint - Exaiining a technique for parsing couand 

line paraaeters in C, 

Greg Law 

March 1990 page 86 

Do the Split - Making large files easier to handle. 

Stephen B. Goldberg 

March 1990 page 96 

Breakpoint - Giving it top priority. 

Greg Law 

March 1990 page 65 

KlSSable 0S9 - Tales of a net iiproved 0S9 Level II for 

the Color Coiputer 3. 

Dale L. Puckett 

April 1990 page 44 

Predicting Profits - A helpful prograi for those planning 

a career in business. 

David Macias 

April 1990 page 113 

Breakpoint - Talking about conversions and diversions. 

Greg Law 

April 1990 page 52 

KlSSable 0S9 - A new look for 0S9. 

Dale L. Puckett 

May 1990 page 46 

Larry's Labeler - Organizing your floppy disks. 

Larry Pittian 

May 1990 page 30 

Breakpoint - Directories and 0S9 file structure. 

Greg Law 

June 1990 page 36 

Type Does Windows - A utility to stitch window types. 

Chris Swinefurth 

June 1990 page 44 

Breakpoint - Scaling the directory tree. 

Greg Law 

July 1990 page 32 

For Your Eyes Only - Logon protection for the single-user 



0S9 ayatei. 

Stephen B. Goldberg 

July 1990 page 72 

Breakpoint - The lissing link. 

Ggreg Law 

July 1990 page 48 

KlSSable 0S9 - Loan procedures for MYFinance. 

Dale L. Puckett 

August 1990 page 20 

CoCo 3 GIME CART* IRQs Explained - A software technique 
that elininates the cartridge interrupt problei. 
Bruce Isted. 

August 1990 page 64 

Living Without Line iuibers - Will the virtues of Basic09 

never cease? 

Dean Bergiann 

August 1990 page 72 

Breakpoint - Basic09 Interfacing. 

Greg Law 

August 1990 page 38 

KlSSable OS9 - CoCo 3 does windows. 

Dale L. Puckett 

Septeiber 1990 page 83 

If Wife = 'Sue, 1 Bring your Potato Salad - Produce 

personalized docuients with this handy lail-ierge 

utility. 

Christopher Jackson 

Septeiber 1990 page 28 
Breakpoint - Reading and writing. 
Greg Law 

Septeiber 1990 page 39 

KlSSable 0S9 - 0S9 gets the grades. 

Dale L. Puckett 

October 1990 page 44 

Displaying Picture Files - Picture storage fonats and 

displaying iiages under OS9 Level II. 

Til Kientzle 

October 1990 page 30 
Breakpoint - Easy access. 
Greg Law 

October 1990 page 58 

KlSSable 0S9 - 0S9 graphics priiitives. 

Dale L. Puckett 

Boveaber 1990 page 48 
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Displaying Picture Files, Part II - Run-length decoding 
techniques and displaying images with 059 level II. 
Til Kientzle 

Hovember 1990 page 27 

KISSable 059 - Automating the offline experience. 

Dale L. Puckett 

Deceiber 1990 page 34 

Displaying Pictures Using 0S9 Level II Graphics, Part III 

- Another look at data- compression techniques. 

Tin Kientzle 



Deceiber 1990 page 41 

Alan - A look at sounding the alari under 059 

David P Boynton 

Deceiber 1990 page 37 
Breakpoint - 'tis the C zen. 
Greg Law 

Deceiber 1990 page 21 

KISSable 0S9 - Legends of the C. 

Dale L. Puckett 



ooooooooooOOOOOOOOOOoooooooooo 

Converting Aaiga 8SYX sound saiples 
for compatibility with PLAT 



Vith the proliferation of MODEMS along CoCo owners, 
coies the likelyhood of acquiring files froi other 
coiputers. Soietiies these files can be considerable 
fun to use under 0S9 on the CoCo. The files I have been 
able to lake use of are the IFF 8SYX sound saiple files 
froi the Couodore Aiiga. IFF stands for Interchange 
File Format, and 8SYX stands for 8 bit Sampled Yoice. 
Most Amiga sound saiple files cose as IFF fouat, and 
have a 'header' of soie 60 bytes tacked onto the 

/* Convert 3SVX sound saiples froi Aiiga files */ 
/* Copyright (c) 1992, by Bob Devries */ 
/* Permission is hereby granted for the non-profit */ 
/* distribution of this prograne as long as the */ 
/* source code is included, and this header is left */ 
/* intact */ 



beginning of each file to identify it. To allow the PD 
'play' coiiand to automatically playback these files, 
this header lust be stripped off, and replaced by two 
bytes to tell 'play' that the file is froi an Aiiga, the 
first byte, and the playback speed, the second byte. To 
this end I created the following program conv8svx in C, 
Compile it asing the normal C compiler usage. Ho special 
headers or libraries are required. 

Bob Devries. 



♦include (stdio.h) 

struct form8svx ( 
char form[4]; 
long flen; 
char svx[4]; 

1; 

struct head { 
char header [41; 
long blklen; 

1; 

struct vce8 ( 
long oneshot; 
long repeat; 
long samphi; 
int speed; 
char octave; 
char comp; 
long volume; 



mainlargc, argv) 
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iat argc; 
char *argv[I; 
[ 

struct EonSsvx frifl; 

struct head hdr; 

struct vce8 voice8; 

iat ch; 

long chunklen; 

char naie[256l; 

FILE *ifp, *ofp, *fopen(); 

setbuf (stdia,HULL) ; /* set buffer to ML so single key forks */ 
setbuf(stdout,IULL); 

pflinitl); 

i£(argc != 3) ( /* silly user tell hii hot */ 

printfl'Usage: ts <in£ile> <outfile>\n',argv[Ol); 

eiit(l); 
I 
i£(access(argv[2],27) != -1) ( /* file exists - penission 01? */ 

priQtf("\nFile VtsV exists ! Overwrite 7/1 $c»,argv[2],7); 

ch = getchard; 

putchar('\a'); 

if (toupper(ch) != T) exit(218); 
1 
ifdifp = fopeafargvIU/r')) == HULL) ( /» problei reading file »/ 

printf('Can ? t open ^s\n , ,argv[ll); 

exit(errno); 
} 
i£[(o£p = fopen(argv[2], , ¥ , )l == HULL) ( /* problei creating file */ 

printf ("Can't create h\n , ,argv[2]j; 

exit(errno); 
1 

/* if the file in less than 12 bytes long it's WOHG! */ 
if(freadUfn8,sizeof(fra8),l,ifp) != 1) I 

closeall(ifp,ofp,argv[2]|; 

printf (■Incorrect file type in *s\n',argv[l]); 

exit(l); 
1 

/* if the word FORM is not present then illegal file type */ 
if((strcip(fn8. fori, "FORM 1 ) != 0) M (strcip(fri8.3VX, i 8SVX») != 0)) ( 

closeall(ifp,ofp,argv[2]); 

printffMs is not an 8SVX saiple £ile!\n* f argv[ll); 

exit(l); 

! 
fhileI!feof(ifp)) | 

if(fread(&hdr,sizeof|hdr),l,ifp) == HULL) ( /* get chunk header */ 
closealI(ifp,ofp,argv[2l); 
printf ( 'Error reading MnVargvM); 
exit(errno); 
1 

ifdhdr.blklen k 1L) == 1L) hdr.blklen++; /* 68000 pads to even len */ 
printf ( "Chunk Is of length tld bytes, \n f , hdr. header,hdr.blklen); 
if (strciplhdr. header, 'BODY') == 0) break; /* BODY chunk */ 
if (strciplhdr. header, 'SAME') == 0) ( 

iflfread(naie,(int)hdr.blklen,l,ifp) == HULL) ( 
closeall(ifp,ofp,argv[2]l; 



Page 8 June 1992 



AUSTRALIAN 0S9 NEWSLETTER 



printf (*Brror reading ls\n f ,argv[l]); 
exit(errno); 
else ( 
printf ( "Same = U\n , ,naie(; 
continue; 



if (3trcip(hdr.header f , YHDi , l == 0) I /* VoiceSHeader */ 
if(freadUvoice8,sizeof(voice8),l,ifp) == HULL) ( 
closeall|ifp,o£p,argv[2]); 
printf ( "Error reading ts\n\argv[ll); 
exit(ermo); 
1 else ( 

continue; 
1 
} 

if[fseek(ifp,hdr.blklen,i) == EOF) 1 
closeall(ifp,ofp,argv[2|); 
printf ('Error reading *s\n\argv[2]); 
exit(i); 



putc(0x80,ofp); 

putc( (char )(voice8. speed/250), of p); 

chunklen = hdr.blklen; 

do ( 

ch = getc(ifp); 

putc(ch,ofp); 
I while (--chunklen ) 0); 
f close! if p) ; 
fcloae(ofp); 
printfCDone .... tc\n\7); 



closeall(in,out,naiel 

FILE *in; 

FILE *out; 

char *naie; 

( 

fcloae(in); 

fcloae(out); 

unlink(naie); 



ooooooooooOOOOOGGOOOoooooooooo 
YerDisk - Disk verify cosiand for 0S9 



VerDiak waa created froi a need to soietiies be able Hext VerDiak reads LSNO of the target disk to 

to check whether a disk had errors on it, without going determine how lany sectors to read and then reads thei 

to the rather lengthy trouble of reading all the files one by one, and reports if any errors were found. It 

on it, one by one. will not quit on error until the last sector is read. 

VerDiak first opens the target disk as a VerDiak can take mltiple device naiea on the 

directory, and reads the PD_0PTS of the path to tell couand line, and will proceed to check each one of thei. 
whether it is an RBF device. Bob Devriea 

/* VerDiak - Verify integrity of disk sectors */ 



June 1992 Page 9 



AUSTRALIAN 0S9 NEWSLETTER 



/* Does a sector read for every sector */ 

/* of the target disk. */ 

/* Copyright (c) 1992. By Bob Devries, */ 

/* Freely distributable for non-profit only. */ 

♦include <stdio.h> 
♦define ERROR (-1) 

/* The following struct is included here because the one * 
/* supplied in 'sgstat.h* does not have an identifier, and * 

/* so cannot be used. You lay care to lodify the relevant * 
/* part. * 



struct rbfopt ( 

char sg_class, 
sgjrive, 
sgjtep, 
sg_dtype, 
sg_dense; 

int sgjryls; 

char sgjides, 
sg_verify; 

int sg_spt, 
sgjptO; 

char sg_intlv, 
sgjalloc, 

sgjfi; 

int sgjxten; 

char sg_xm, 
sg_att, 
sg_fdpsn[3l, 
sg_dipsn[3l; 

long sgjirptr; 

int sg dvt; 

1; 

union disksize { 
long nuisec; 
char tsec[4]; 



/* device class - repeated froi above 

/* drive nuiber 

/* step rate 

/* device type 

/* density capability 

/* nuiber of cylinders (tracks) 

/* nuiber of sides 

/* = verify on writes 

/* default sectors per track 

/* ditto track 

/* sector interleave factor 

/* segient allocation size 

/* dia transfer lode 

/* path extension for record locking 

/* junk fill 

/* file attributes 

/* file descriptor PSH 

/* file's directory PSH 

/* directory entry pointer 

/* address of device table entry 



lamlargc, argv) 
int argc; 

char *argv[]; 

( 

char sector! 256 1 ; 

char devnaie[32]; 

long pos; 

int i = 1; 

union disksize dsiz; 

struct rbfopt *rbf ; 

int op; 

FILE *£p; 

pflinitj); /* we'll be printing longs */ 

dsiz.tsec[Ol = '\0'; 

i£( ! — argc) I /* duib user, tell hii how it's done */ 
printf ('Usage: ts /devnaie [/devnaiel ...\n v ,argv[0] 
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exit(215); 
1 
while(argc-) ( 

printf { "la: Checking \3\a l ,argv[0l,argv[i]); 

3 tr cpy ( devnaie , arg v [ i ] } ; 

ifllfp = fopenldevnaie/d 1 )) == HULL) I /* open as DIR '/ 

printf (Ms: Can't open t3\n',argv[Ql,argv[iI); 

i++; 

continue; /* get next devnane if possible */ 
I 

getstat(0,fp,rbf); /* get PDJPTS section of path */ 
if(!(rbf-)sg_class != 1)) ( /* wrong device type */ 

printf ("ts is not an RBF device\n',argv[il); 

close(fp); 

i++; 
continue; 

} 

fclose(fp); 

strcat[devnaie,T); 

op = open ( devnaie, JEAD); /* had to do open!) to do rawread */ 

lseek(op,01,0); /* seek to start of disk and */ 

if((read(op,dsiz.tsecU,3)) == EOF) | /* read first 3 bytes */ 

printfCls: Could not get disk size of ls\n\argv[()],argv[il); 

close(fp); 

in; 

continue; 

1 

lseek(op,0l,0); /* seek back to start */ 

for(pos=0;pos < dsiz,nuisec;pos++) [ 

if (read(op,sector,256) == ERROR) | /* read sectors */ 

printf ("Sector Ud ($UX) on \s is bad\n\pos,pos,argv[iI); 



close(op); /* finished with this one */ 
i++; /* point to next */ 



/* EOF */ 



ooooooooooOOOOOOOOOOoooooooooo 



MORE - Froi Boisy G. Pitre 



Ok guys and gals, here's the newest edition of ly 'tore' 
utility. This one handles multiple files and has a few 
extra options. Hope you like it. 

Enjoy! 

mftft*fcftfttt*t*fctttttfctfcftfctfttfc*mftfcft***fttHt*****ttt*ft 

More - Proipts lists a file or files one 
screen at a tiie. 
If no files are specified, STDIH is used. 

At the -More— proipt, press: 
(E1TER) to go advance one line 
(BREAK) or »Q' to quit 



(SPACE) or any other key to advance 
one screenful 
Usage: More [-1 -w| [file] [...I 

-I = show the naie of the file before viewing 

(handy for lultiple files) 
-w = don't allow lines to wrap around. 
This option truncates the line to a 
length of window's X size - I. 

If you are using a teninal other than the 
OS-9 Level II windowing systei, you will need 
to change the reverse on/off sequence as well 
as the clear line sequence 
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* BOTE: 


More works great with ShelH's wildcards! 


CR 


fcb 


$0d Carriage Return 


* It also works well with external terminals. 








* Just change the Reverse on/off and DelLine 


Start 


pshs 


x put away X teiporarily, 


* bytes to latch your teriinal' s codes. 




leax 


IntSvc,pc point to the interrupt 




If you are running 'lore' on a teriinal, 


* 




service routine 


* it assuies an 90x24 teriinal screen size. 


it 


os9 


FJIcpt and lake the systei aware of 


* By: Boisy G. 


Pitre 


puis 


x then get X back for processing 


* 120* Love Street 




clr 


Path Clear the path (assuie stdin) 


* Brookhaven, MS 39601 




clr 


LFlag 


* Internet 


: bgpitre8seabass.st.usi.edu 




Ibsr 


GetSize 






* 


Parsing of the line is done here 


ifpl 




Parse 


Ida 


,!♦ 


use 


/DD/DEFS/os9defs 




cipa 


#$20 


endc 






beq 
cipa 


Parse 


* Teriinal specific equates: 




beq 


GetOpt 


XSIZE equ 


90 




cipa 


t$0d 


YSIZE equ 


24 




bne 


Openlt 


DELHE equ 


53 




tst 


Path 


BEVON equ 


$lf20 




beq 


Cycle 


REVOFF equ 


$1£21 




lbra 


Done 


lod 


Size, iaie,PrgriH)b]ct,ReentU, Start, Fin 


GetOpt 


Ida 


,x+ 


Haie fcs 


/M/ 




cipa 


t$20 


Ed fcb 


2 




beq 
anda 


Parse 


Path rib 


1 




cipa 


t'L 


Response rib 


1 




bne 


IsitV 


XH rib 


1 




CO! 


LFlag 


XL rib 


1 




bra 


Parse 


YH rib 


1 


Islffl 


cipa 


* r * 


YL rib 


1 




lbne 


Done 


Lflag rib 


1 




Ida 


XL 


Buffer rib 


250 




deca 




FileBuf rib 


60 




sta 


XH 


Stack rib 


200 




bra 


Parse 






* Here, 


we test to see if the -I 


* I lake the Paris buffer large in case 


* flag 


is set (to display the file 


* the wildcard 


expansion is long, 


* header) If 


30, we print it, else 


* else the systei crashes. You can 


* we continue 


lith reading... 


* alternately 


use the shell's leiory 


Openlt 


leax 


-l,i 


* lodifier (i. 


e. t4k) to insure a big buffer. 




tst 


LFlag 


Paris rib 


4096 




beq 
pshs 


0pen2 

X 


Fin equ 


• 




Ibsr 
puis 


PutHead 

X 


Message fdb 


REVOH Reverse Yideo on 




dec 


YH Decreient counter twice to take into 


fee 


/-More-/ 




dec 


YH account the header (two lineal 


fdb 


REVOFF Reverse Video off 








MessLen equ 


*-Message 


Open2 


Ida 

os9 


#Read. Prepare for reading 
IJOpen Then open the file 


Header fdb 


$0a0d 




Ibcs 


Error Exit on error 


fee 


/****** pii e: / 




pshs 


x Save X for later use 


HeadLen equ 


♦-Header 




sta 

bra 


Path ...else save the path 
ReadLin and read the line 



DelLine fcb 



DELHE 



Delete line char 
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Cycle Ida 


7L Get the low order byte 




puis 


x else there lay be lore files 


ata 


7fl and use the high as a counter 




Ibra 


Parse on theconiand line. 


bar 


PutCR 


Oone 


clrb 




ReadLine Ida 


Path Get the path 


Error 


os9 


F$Exit 


ldy 


1250 lax 'chars read = 250 








Leax 


Buffer, u point to the buffer 


Testlnp 


Ida 


Response Here we test 


089 


I$ReadLn and read the line 


t 




the response at proipt 


bcs 


EOF if error, check for EOF 




ciipa 


*$0d is it cr? 


tat 


XH Is high order byte set? 




beq 


OneLine yep, go up one line 


beq 


VriteOut Hope, continue as norial 




anda 


t$df else task uppercase 


pshs 


x else loop until end of the 




cipa 


* ? Q is it Q? 


ldb 


XH string and place a CR at the 




Ibne 


Cycle nope, 


Loop leax 


l,x end. 


t 




lust be space or other char 


decb 


This is unnecessary if the line 




bra 


Done else we quit 


bne 


Loop is less than XH, but doesn't slow 








Ida 


t$0d down the processing considerably 


IntSvc 


bsr 


KillLine Interrupt service routine 


sta 


,x and would take longer if we 




bra 


Oone 


actually 










puis 


x checked to see if a CR existed. 


OneLine 


Ida 
sta 


ti Ve go here if (ESTER) was pressed 
7H,u to increient only one line 


tfriteOnt Ida 


U Prepare to write to stdout 




lbra 


ReadLine 


os9 


WritLn Write! 


* Here, 


we actually print the header 


bcs 


Error if error, leave 


* for the file 


we are working on. 


dec 


!H else decreaent the counter 


PutHead 


pshs 


X 


bne 


ReadLine if not 0, sore lines to show 




leax 


Header, per 


leax 


Message, pc Prepare to show lessage 




ldy 


tHeadLen 


ldy 


fKessLen 




Ida 


tl 


Ida 


\1 to stderr... 




os9 


Write 


os9 


Write write it! 




bcs 


Error 


bcs 


Error 




puis 


X 


Ida 


12 Sow get response 




bsr 


SaveFile 


ldy 


#1 of one character 




Ida 


*1 


leax 


Response,* froi stderr 




leax 


FileBuf,u 


os9 


I$Read 




ldy 


160 


bcs 


Error 




os9 


WritLn 


bsr 


KillLine 




bcs 


Error 


bra 


Testlnp 




rts 




PutCR Leax 


CR,pc 


t*t*ttt*tttttt*tit**ttttttt**tttt*tt*fcftt 


Ida 


#1 


* Saves fiienaie in buffer 


ldy 


*1 


t 






089 


Write 


* Entry: 


: X - Address where fiienaie is 


bcs 


Error 


t 






rts 




' Exit: 
t 


Hone. 


Fiienaie is stored in FileBuf 


KillLine Ida 


12 Here we send a delete line char 








ldy 


U to clean the proipt. 


SaveFile pshs 


X 


leax 


DelLine,pc 




leay 


FileBuf, u 


os9 


Write 


SaveF2 


Ida 


,x+ 


bcs 


Error 




cipa 


t;2o 


rts 






bne 

Ida 


SaveF3 
t$0d 


EOF cipb 


*E$E0F Check for end-of-file 


SaveF3 


sta 


,7+ 


bne 


Error 




cipa 


#$0d 


tst 


Path If the path is stdin, we can quit 




bne 


SaveF2 


beq 


Done 




puis 


X 
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rta 








rts 










* IE this is true, then we are probably dealing with a 


GetSize pahs 


x 




* terminal, not 


a hardware window. 


Ida 


II 


Using stdaat... 


* We'll 


assuie 


80x24 as the terminal size. 


ldb 


*$26 


, 


ChekErr 


cipb 


*E$UnkSvc 


ob9 


ISGetStt 


Find the size of window 




bne 


Error 


bee 


ChekErr 






Ida 


tXSIZE 


stx 


XH 


Save the X value 




sta 


XL 


sty 


7H 


Save the 7 value 




Ida 


#7SIZE 


clr 


XH 


Clear high-order byte of X 




sta 


7L 


dec 


XL 


Decreient the X value 




clr 


XH 


dec 


TL 


Decreient the 7 value 




rts 




dec 


7L 


and dec 7 again 




eiod 




Ida 


TL 


Do the initial load 


Size 


equ 


* 


3ta 


TH 


of the counter 




end 




pals 


X 











ooooooooooOOOOOOOOOOoooooooooo 

Scribe - Selected lessages froi the Os9 area on 05-05-1992 

Good news to all you HD owner who can't seei to find the time HDKIT requires to backup your hard drive. 
Bring on 'STREAM 1 



************ 



ABOUT FOUR TIMES FASTER THAS HDKIT 



************ 



Soie time ago, Bruce Isted wrote a backup prograi called STREAM. It has since been tested extensivly by five or six 
beta testers. I'm pleased to tell you that it is now available as of about a week ago when Kim Bergman phoned Bruce 
and asked if it was OK to add it to the OCfi Library. It is also available on the Keyboard BBS (see tag line) as of 
this day. 

HD Kit was and still is a great program but some what SLOV. Bruce still recomends using Fete Lyall's 'Files' module 
from HD Kit or D.F. Johnson's 'LS' command, with STREAK. 



Here is a comparison between the two programs using a 20 meg HI 
sect & 1.44 meg). 

STATS OH STREAK VS HD KIT [using a 20 meg ST-225 Hard Disk Drive! 



and THREE types of disk drives (1440 sect., 2880 



Std disk Drives !! 80 tk disk drives !! 1.44 meg disk dr. 
1440 Sector Drives!! 2880 Sector Drives!! 5760 Sector Drives 
m m 

disks Backup TIME: Mdisks Backup TIKE: Mdisks Backup TIKE: 

used 1 disk TOTAL! !used 1 disk TOTAL! Used 1 disk TOTAL 
it n 



55 


9.5min 523min!> 28 
ii 


19.min 535min!! not tried via HD KIT 

it 


55 


l.Smin 99min!! 28 

ii 


4.min 112min!! 14 S.min U2min via STREAK 
it 



ooooooooooOOOOOOOOOOoooooooooo 
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